home *** CD-ROM | disk | FTP | other *** search
/ 17 Bit Software 6: Level 6 / 17 Bit - Level 6 (1998)(Epic Marketing)[!].iso / !applications! / symphonie / dsplugin / dspplugin inv chan.s < prev    next >
Text File  |  1994-04-11  |  2KB  |  145 lines
  1.  
  2.     MC68020
  3.  
  4. SST_SYS_GetMem            EQU    0
  5. SST_SYS_FreeMem            EQU    4
  6.  
  7. SST_FILE_RequestFileName    EQU    100
  8. SST_FILE_SetReqPattern        EQU    104
  9. SST_FILE_SetReqDir        EQU    108
  10. SST_FILE_GetFileName        EQU    112
  11. SST_FILE_GetFileLen        EQU    116
  12.  
  13. SST_GFX_AssistText        EQU    200
  14. SST_GFX_AssistDecLong        EQU    204
  15. SST_GFX_AssistDecByte        EQU    208
  16. SST_GFX_AssistHexLong        EQU    212
  17.  
  18. SST_AUDIO_GetChunkLen        EQU    400
  19.  
  20. SST_PTR_EXECBASE        EQU    1600
  21. SST_PTR_INTBASE            EQU    1604
  22. SST_PTR_DOSBASE            EQU    1608
  23. SST_PTR_ASLBASE            EQU    1612
  24. SST_PTR_REQTOOLSBASE        EQU    1616
  25. SST_PTR_GFXBASE            EQU    1620
  26.  
  27. SST_PTR_Screen            EQU    1650
  28.  
  29. SST_ADR_ProcessorFlags        EQU    1800
  30. SST_ADR_SystemFrequency        EQU    1804
  31. SST_ADR_SystemBpm        EQU    1808
  32. SST_ADR_ChunkLen        EQU    1812
  33. SST_ADR_OversampleFlag        EQU    1816
  34.  
  35.  
  36.     dc.b    "Symphonie DSP Plugin"    ;MAGIC String    (PRIVATE)
  37.     dc.w    1,0            ;Version,Release (PRIVATE,DO NOT CHANGE)
  38.  
  39.     ;- DSPLIB -------------------------------------------------
  40.  
  41.     jmp    InitDSP(PC)        ;Allocate Mem, Build your Tables
  42.     jmp    CleanUpDSP(PC)        ;Free Mem
  43.  
  44.     jmp    ProcDsp(PC)        ;Process DSP algorithm (interrupt)
  45.  
  46.     jmp    GetDspTitle(PC)        ;Get DSP algorithm Title
  47.     jmp    ModifyValue(PC)        ;notify changed Value
  48.  
  49.     jmp    GraphSizeModify(PC)    ;notify graph size has changed
  50.     jmp    RefreshGraph(PC)    ;notify its time for a GFX update
  51.  
  52.     jmp    StartDSP(PC)        ;notify start
  53.     jmp    StopDSP(PC)        ;notify stop
  54.     dc.l    -1
  55.  
  56.     ;- CODE --------------------------------------------------
  57.  
  58.  
  59. StartDSP
  60.     rts
  61.  
  62. StopDSP
  63.     rts
  64.  
  65. GraphSizeModify
  66.     rts
  67.  
  68. RefreshGraph
  69.     rts
  70.  
  71. ModifyValue    ;INPUT (D0L,D1L)(VALUE, PARAMETER ID)
  72.     rts
  73.  
  74. Volume    dc.l    256
  75.  
  76. GoSST    move.l    a6,-(sp)
  77.     move.l    SUPERSTBASE(PC),a6
  78.     move.l    (a6,d7.w),a6
  79.     jsr    (a6)
  80.     move.l    (sp)+,a6
  81.     rts
  82.  
  83.  
  84. InitDSP        ;I(A0L)(SUPERSUPPORTTABLE_PTR)
  85.         ;O(A0L)(DSPGUI_PTR)
  86.  
  87.     lea.l    SUPERSTBASE(PC),a1
  88.     move.l    a0,(a1)
  89.  
  90.     lea.l    Welcome_TXT(PC),a0
  91.     move.l    #SST_GFX_AssistText,d7
  92.     bsr    GoSST
  93.  
  94.  
  95.  
  96.  
  97.     lea.l    Parameter_DEF(PC),a0
  98.     rts
  99.  
  100. CleanUpDSP    rts
  101.  
  102. GetDspTitle    ;OUTPUT (A0L)(DSPTitle_TXT)
  103.     lea.l    DSPTitle(PC),a0
  104.     rts
  105.  
  106. ProcDsp        ;INPUT (D0W,A1L)(SAMPLE_NUMB,SAMPLECHUNK_PTR)
  107.     movem.l    d0-a6,-(sp)
  108.  
  109.     subq.w    #1,d0
  110.  
  111. .loop
  112.     move.l    (a1),d1
  113.  
  114.     neg.w    d1
  115.     swap    d1
  116.     neg.w    d1
  117.     swap    d1
  118.  
  119.     move.l    d1,(a1)+
  120.     dbf    d0,.loop
  121.  
  122.  
  123.     movem.l    (sp)+,d0-a6
  124.     rts
  125.  
  126.  
  127.  
  128.     ;- GUI ------------------------------------------------------
  129.  
  130.     even
  131. Parameter_DEF
  132.     dc.b    0        ;END OF GUI DEF
  133.  
  134.     ;- TITLE ----------------------------------------------------
  135.  
  136.  
  137.         dc.b    "$VER: "
  138. DSPTitle    dc.b    "Test Dsp Plugin v1.0",0
  139. Welcome_TXT    dc.b    "Invert Channels",0
  140.  
  141.         even
  142. SUPERSTBASE    dc.l    0
  143. test        dc.l    0
  144.     END
  145.